/ Archive Magazine CD 1995 / Archive Magazine CD 1995.iso / discs / prog_disc / volume_1 / issue_11 / scrncomp / scompact

< prev

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 11 f4 20 3e 24 | 2e 53 43 6f 6d 70 61 63 |..... >$|.SCompac|
|00000010| 74 0d 00 14 04 0d 00 1e | 27 f4 20 2a 2a 2a 2a 2a |t.......|'. *****|
|00000020| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000030| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 0d 00 28 27 |********|****..('|
|00000040| f4 20 2a 20 20 53 63 72 | 65 65 6e 20 43 6f 6d 70 |. *  Scr|een Comp|
|00000050| 61 63 74 20 2f 20 44 65 | 2d 63 6f 6d 70 61 63 74 |act / De|-compact|
|00000060| 20 20 2a 0d 00 32 27 f4 | 20 2a 20 77 72 69 74 74 |  *..2'.| * writt|
|00000070| 65 6e 20 62 79 20 41 64 | 72 69 61 6e 20 50 68 69 |en by Ad|rian Phi|
|00000080| 6c 69 70 20 4c 6f 6f 6b | 20 2a 0d 00 3c 27 f4 20 |lip Look| *..<'. |
|00000090| 2a 20 20 20 20 20 20 20 | 20 32 33 72 64 20 4a 75 |*       | 23rd Ju|
|000000a0| 6e 65 20 31 39 38 38 20 | 20 20 20 20 20 20 20 20 |ne 1988 |        |
|000000b0| 2a 0d 00 46 27 f4 20 2a | 2a 2a 2a 2a 2a 2a 2a 2a |*..F'. *|********|
|000000c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000d0| 2a 2a 2a 2a 2a 2a 2a 2a | 0d 00 50 04 0d 00 5a 10 |********|..P...Z.|
|000000e0| de 20 63 6f 64 65 25 20 | 26 31 46 46 0d 00 64 15 |. code% |&1FF..d.|
|000000f0| de 20 77 6f 72 6b 73 70 | 63 25 20 26 32 44 30 36 |. worksp|c% &2D06|
|00000100| 32 0d 00 6e 0f de 20 62 | 6c 6f 63 6b 25 20 31 36 |2..n.. b|lock% 16|
|00000110| 0d 00 78 04 0d 00 82 07 | eb 20 30 0d 00 8c 1b e8 |..x.....|. 0.....|
|00000120| 27 22 53 6f 75 72 63 65 | 20 66 69 6c 65 3e 22 73 |'"Source| file>"s|
|00000130| 5f 66 69 6c 65 24 0d 00 | 96 1f e8 22 44 65 73 74 |_file$..|..."Dest|
|00000140| 69 6e 61 74 69 6f 6e 20 | 66 69 6c 65 3e 22 64 5f |ination |file>"d_|
|00000150| 66 69 6c 65 24 0d 00 a0 | 05 87 0d 00 aa 04 0d 00 |file$...|........|
|00000160| b4 0d f2 61 73 73 65 6d | 62 6c 65 0d 00 be 04 0d |...assem|ble.....|
|00000170| 00 c8 07 d1 3d 30 0d 00 | d2 1e ff 28 22 46 41 53 |....=0..|...("FAS|
|00000180| 54 4c 4f 41 44 20 22 2b | 73 5f 66 69 6c 65 24 29 |TLOAD "+|s_file$)|
|00000190| 20 3a 20 87 0d 00 dc 07 | 66 3d 91 0d 00 e6 04 0d | : .....|f=......|
|000001a0| 00 f0 13 6e 3d a8 28 a4 | 73 69 7a 65 2f 26 34 30 |...n=.(.|size/&40|
|000001b0| 30 29 0d 00 fa 04 0d 01 | 04 07 d1 3d 30 0d 01 0e |0)......|...=0...|
|000001c0| 14 f2 73 71 75 61 73 68 | 28 64 5f 66 69 6c 65 24 |..squash|(d_file$|
|000001d0| 29 0d 01 18 07 73 3d 91 | 0d 01 22 04 0d 01 2c 07 |)....s=.|.."...,.|
|000001e0| d1 3d 30 0d 01 36 16 f2 | 75 6e 73 71 75 61 73 68 |.=0..6..|unsquash|
|000001f0| 28 64 5f 66 69 6c 65 24 | 29 0d 01 40 07 6c 3d 91 |(d_file$|)..@.l=.|
|00000200| 0d 01 4a 04 0d 01 54 1e | f1 8a 31 2c 31 29 22 4f |..J...T.|..1,1)"O|
|00000210| 6c 64 4c 6f 61 64 3e 22 | 3b 66 2f 31 30 30 3b 22 |ldLoad>"|;f/100;"|
|00000220| 73 22 0d 01 5e 22 f1 8a | 31 2c 32 29 22 43 6f 6d |s"..^"..|1,2)"Com|
|00000230| 70 61 63 74 4c 6f 61 64 | 3e 22 3b 6c 2f 31 30 30 |pactLoad|>";l/100|
|00000240| 3b 22 73 22 0d 01 68 25 | f1 8a 31 2c 33 29 22 54 |;"s"..h%|..1,3)"T|
|00000250| 69 6d 65 20 66 61 63 74 | 6f 72 3e 22 3b a8 28 31 |ime fact|or>";.(1|
|00000260| 30 2a 66 2f 6c 29 2f 31 | 30 0d 01 72 04 0d 01 7c |0*f/l)/1|0..r...||
|00000270| 20 63 3d a8 28 28 77 6f | 72 6b 73 70 63 25 21 26 | c=.((wo|rkspc%!&|
|00000280| 36 34 2b 26 36 38 29 2f | 26 34 30 30 29 0d 01 86 |64+&68)/|&400)...|
|00000290| 04 0d 01 90 16 f1 8a 31 | 2c 35 29 22 4f 6c 64 3a |.......1|,5)"Old:|
|000002a0| 22 3b 6e 3b 22 6b 22 0d | 01 9a 1a f1 8a 31 2c 36 |";n;"k".|.....1,6|
|000002b0| 29 22 43 6f 6d 70 61 63 | 74 3a 22 3b 63 3b 22 6b |)"Compac|t:";c;"k|
|000002c0| 22 0d 01 a4 2b f1 8a 31 | 2c 37 29 22 43 6f 6d 70 |"...+..1|,7)"Comp|
|000002d0| 61 63 74 69 6f 6e 20 66 | 61 63 74 6f 72 3a 22 3b |action f|actor:";|
|000002e0| a8 28 31 30 2a 6e 2f 63 | 29 2f 31 30 0d 01 ae 0b |.(10*n/c|)/10....|
|000002f0| f1 8a 31 2c 39 29 3b 0d | 01 b8 05 ee 0d 01 c2 05 |..1,9);.|........|
|00000300| e0 0d 01 cc 04 0d 01 d6 | 13 dd f2 73 71 75 61 73 |........|...squas|
|00000310| 68 28 66 69 6c 65 24 29 | 0d 01 e0 11 f2 73 61 76 |h(file$)|.....sav|
|00000320| 65 5f 70 61 6c 65 74 74 | 65 0d 01 ea 0f 43 25 3d |e_palett|e....C%=|
|00000330| 77 6f 72 6b 73 70 63 25 | 0d 01 f4 0f 45 25 3d a4 |workspc%|....E%=.|
|00000340| 73 63 72 6e 61 64 72 0d | 01 fe 0f 46 25 3d 45 25 |scrnadr.|...F%=E%|
|00000350| 2b a4 73 69 7a 65 0d 02 | 08 0c d6 20 73 71 75 61 |+.size..|... squa|
|00000360| 73 68 0d 02 12 3e ff 28 | 22 53 41 56 45 20 22 2b |sh...>.(|"SAVE "+|
|00000370| 66 69 6c 65 24 2b 22 20 | 22 2b c3 7e 28 77 6f 72 |file$+" |"+.~(wor|
|00000380| 6b 73 70 63 25 29 2b 22 | 2b 22 2b c3 7e 28 77 6f |kspc%)+"|+"+.~(wo|
|00000390| 72 6b 73 70 63 25 21 26 | 36 34 2b 26 36 38 29 29 |rkspc%!&|64+&68))|
|000003a0| 0d 02 1c 05 e1 0d 02 26 | 04 0d 02 30 15 dd f2 75 |.......&|...0...u|
|000003b0| 6e 73 71 75 61 73 68 28 | 66 69 6c 65 24 29 0d 02 |nsquash(|file$)..|
|000003c0| 3a 25 ff 28 22 4c 4f 41 | 44 20 22 2b 66 69 6c 65 |:%.("LOA|D "+file|
|000003d0| 24 2b 22 20 22 2b c3 7e | 28 77 6f 72 6b 73 70 63 |$+" "+.~|(workspc|
|000003e0| 25 29 29 0d 02 44 14 eb | 20 77 6f 72 6b 73 70 63 |%))..D..| workspc|
|000003f0| 25 3f 31 20 3a 20 87 0d | 02 4e 0f 21 77 6f 72 6b |%?1 : ..|.N.!work|
|00000400| 73 70 63 25 3d 30 0d 02 | 58 0f 43 25 3d 77 6f 72 |spc%=0..|X.C%=wor|
|00000410| 6b 73 70 63 25 0d 02 62 | 0f 45 25 3d a4 73 63 72 |kspc%..b|.E%=.scr|
|00000420| 6e 61 64 72 0d 02 6c 0f | 46 25 3d 45 25 2b a4 73 |nadr..l.|F%=E%+.s|
|00000430| 69 7a 65 0d 02 76 0e d6 | 20 75 6e 73 71 75 61 73 |ize..v..| unsquas|
|00000440| 68 0d 02 80 05 e1 0d 02 | 8a 04 0d 02 94 12 dd f2 |h.......|........|
|00000450| 73 61 76 65 5f 70 61 6c | 65 74 74 65 0d 02 9e 11 |save_pal|ette....|
|00000460| 77 6f 72 6b 73 70 63 25 | 3f 30 3d 32 32 0d 02 a8 |workspc%|?0=22...|
|00000470| 10 77 6f 72 6b 73 70 63 | 25 3f 31 3d eb 0d 02 b2 |.workspc|%?1=....|
|00000480| 10 77 6f 72 6b 73 70 63 | 25 3f 32 3d 30 0d 02 bc |.workspc|%?2=0...|
|00000490| 10 77 6f 72 6b 73 70 63 | 25 3f 33 3d 30 0d 02 c6 |.workspc|%?3=0...|
|000004a0| 12 77 73 25 3d 77 6f 72 | 6b 73 70 63 25 2b 34 0d |.ws%=wor|kspc%+4.|
|000004b0| 02 d0 14 e3 20 70 61 6c | 65 74 74 65 3d 30 20 b8 |.... pal|ette=0 .|
|000004c0| 20 31 35 0d 02 da 0c 77 | 73 25 3f 30 3d 31 39 0d | 15....w|s%?0=19.|
|000004d0| 02 e4 11 77 73 25 3f 31 | 3d 70 61 6c 65 74 74 65 |...ws%?1|=palette|
|000004e0| 0d 02 ee 19 c8 99 20 22 | 4f 53 5f 57 6f 72 64 22 |...... "|OS_Word"|
|000004f0| 2c 31 31 2c 77 73 25 2b | 31 0d 02 f8 0a 77 73 25 |,11,ws%+|1....ws%|
|00000500| 2b 3d 36 0d 03 02 0d ed | 20 70 61 6c 65 74 74 65 |+=6.....| palette|
|00000510| 0d 03 0c 05 e1 0d 03 16 | 04 0d 03 20 0d dd a4 73 |........|... ...s|
|00000520| 63 72 6e 61 64 72 0d 03 | 2a 10 62 6c 6f 63 6b 25 |crnadr..|*.block%|
|00000530| 21 30 3d 31 34 39 0d 03 | 34 0f 62 6c 6f 63 6b 25 |!0=149..|4.block%|
|00000540| 21 34 3d 2d 31 0d 03 3e | 2c c8 99 20 22 4f 53 5f |!4=-1..>|,.. "OS_|
|00000550| 52 65 61 64 56 64 75 56 | 61 72 69 61 62 6c 65 73 |ReadVduV|ariables|
|00000560| 22 2c 62 6c 6f 63 6b 25 | 2c 62 6c 6f 63 6b 25 2b |",block%|,block%+|
|00000570| 38 0d 03 48 0d 3d 62 6c | 6f 63 6b 25 21 38 0d 03 |8..H.=bl|ock%!8..|
|00000580| 52 04 0d 03 5c 0a dd a4 | 73 69 7a 65 0d 03 66 26 |R...\...|size..f&|
|00000590| c8 99 20 22 4f 53 5f 52 | 65 61 64 4d 6f 64 65 56 |.. "OS_R|eadModeV|
|000005a0| 61 72 69 61 62 6c 65 22 | 2c eb 2c 34 20 b8 20 2c |ariable"|,.,4 . ,|
|000005b0| 2c 78 0d 03 70 16 78 3d | 34 2d 78 3a 78 3d 38 2a |,x..p.x=|4-x:x=8*|
|000005c0| 28 32 5e 78 29 2a 31 30 | 0d 03 7a 26 c8 99 20 22 |(2^x)*10|..z&.. "|
|000005d0| 4f 53 5f 52 65 61 64 4d | 6f 64 65 56 61 72 69 61 |OS_ReadM|odeVaria|
|000005e0| 62 6c 65 22 2c eb 2c 35 | 20 b8 20 2c 2c 79 0d 03 |ble",.,5| . ,,y..|
|000005f0| 84 11 79 3d 33 2d 79 3a | 79 3d 79 2a 32 35 36 0d |..y=3-y:|y=y*256.|
|00000600| 03 8e 26 c8 99 20 22 4f | 53 5f 52 65 61 64 4d 6f |..&.. "O|S_ReadMo|
|00000610| 64 65 56 61 72 69 61 62 | 6c 65 22 2c eb 2c 33 20 |deVariab|le",.,3 |
|00000620| b8 20 2c 2c 63 0d 03 98 | 0a c8 8e 20 63 20 ca 0d |. ,,c...|... c ..|
|00000630| 03 a2 0e c9 20 31 20 20 | 3a 20 6d 3d 38 0d 03 ac |.... 1  |: m=8...|
|00000640| 0e c9 20 33 20 20 3a 20 | 6d 3d 34 0d 03 b6 0e c9 |.. 3  : |m=4.....|
|00000650| 20 31 35 20 3a 20 6d 3d | 32 0d 03 c0 0e c9 20 36 | 15 : m=|2..... 6|
|00000660| 33 20 3a 20 6d 3d 31 0d | 03 ca 05 cb 0d 03 d4 0a |3 : m=1.|........|
|00000670| 3d 78 2a 79 2f 6d 0d 03 | de 04 0d 03 e8 0e dd f2 |=x*y/m..|........|
|00000680| 61 73 73 65 6d 62 6c 65 | 0d 03 f2 0b 62 79 74 65 |assemble|....byte|
|00000690| 61 3d 30 0d 03 fc 0b 62 | 79 74 65 62 3d 31 0d 04 |a=0....b|yteb=1..|
|000006a0| 06 0a 73 61 76 65 3d 32 | 0d 04 10 09 61 64 64 3d |..save=2|....add=|
|000006b0| 33 0d 04 1a 0c 73 63 72 | 65 65 6e 3d 34 0d 04 24 |3....scr|een=4..$|
|000006c0| 09 65 6e 64 3d 35 0d 04 | 2e 0a 69 6e 69 74 3d 36 |.end=5..|..init=6|
|000006d0| 0d 04 38 04 0d 04 42 13 | e3 20 6f 70 74 3d 30 20 |..8...B.|. opt=0 |
|000006e0| b8 20 33 20 88 20 32 0d | 04 4c 0c 50 25 3d 63 6f |. 3 . 2.|.L.P%=co|
|000006f0| 64 65 25 0d 04 56 0c 5b | 4f 50 54 20 6f 70 74 0d |de%..V.[|OPT opt.|
|00000700| 04 60 0b 2e 73 71 75 61 | 73 68 0d 04 6a 1b 53 54 |.`..squa|sh..j.ST|
|00000710| 4d 46 44 20 52 31 33 21 | 2c 7b 52 30 2d 52 31 32 |MFD R13!|,{R0-R12|
|00000720| 2c 52 31 34 7d 0d 04 74 | 0f 4d 4f 56 20 52 37 2c |,R14}..t|.MOV R7,|
|00000730| 23 26 46 46 0d 04 7e 16 | 41 44 44 20 73 61 76 65 |#&FF..~.|ADD save|
|00000740| 2c 73 61 76 65 2c 23 26 | 36 34 0d 04 88 11 4d 4f |,save,#&|64....MO|
|00000750| 56 20 69 6e 69 74 2c 73 | 61 76 65 0d 04 92 14 41 |V init,s|ave....A|
|00000760| 44 44 20 73 61 76 65 2c | 73 61 76 65 2c 23 34 0d |DD save,|save,#4.|
|00000770| 04 9c 1a 4c 44 52 42 20 | 62 79 74 65 61 2c 5b 73 |...LDRB |bytea,[s|
|00000780| 63 72 65 65 6e 5d 2c 23 | 31 0d 04 a6 0a 2e 73 74 |creen],#|1.....st|
|00000790| 61 72 74 0d 04 b0 0e 4d | 4f 56 20 61 64 64 2c 23 |art....M|OV add,#|
|000007a0| 31 0d 04 ba 09 2e 6c 6f | 6f 70 0d 04 c4 18 53 54 |1.....lo|op....ST|
|000007b0| 52 42 20 52 37 2c 5b 73 | 63 72 65 65 6e 2c 23 2d |RB R7,[s|creen,#-|
|000007c0| 31 5d 0d 04 ce 19 53 54 | 52 42 20 62 79 74 65 61 |1]....ST|RB bytea|
|000007d0| 2c 5b 73 61 76 65 2c 61 | 64 64 5d 0d 04 d8 12 41 |,[save,a|dd]....A|
|000007e0| 44 44 20 61 64 64 2c 61 | 64 64 2c 23 31 0d 04 e2 |DD add,a|dd,#1...|
|000007f0| 13 4d 4f 56 20 62 79 74 | 65 62 2c 62 79 74 65 61 |.MOV byt|eb,bytea|
|00000800| 0d 04 ec 1a 4c 44 52 42 | 20 62 79 74 65 61 2c 5b |....LDRB| bytea,[|
|00000810| 73 63 72 65 65 6e 5d 2c | 23 31 0d 04 f6 12 43 4d |screen],|#1....CM|
|00000820| 50 20 73 63 72 65 65 6e | 2c 65 6e 64 0d 05 00 0c |P screen|,end....|
|00000830| 42 45 51 20 73 6b 69 70 | 0d 05 0a 10 43 4d 50 20 |BEQ skip|....CMP |
|00000840| 61 64 64 2c 23 31 32 37 | 0d 05 14 0c 42 45 51 20 |add,#127|....BEQ |
|00000850| 73 6b 69 70 0d 05 1e 13 | 43 4d 50 20 62 79 74 65 |skip....|CMP byte|
|00000860| 61 2c 62 79 74 65 62 0d | 05 28 0c 42 4e 45 20 6c |a,byteb.|.(.BNE l|
|00000870| 6f 6f 70 0d 05 32 09 2e | 73 6b 69 70 0d 05 3c 0e |oop..2..|skip..<.|
|00000880| 43 4d 50 20 61 64 64 2c | 23 32 0d 05 46 0c 42 45 |CMP add,|#2..F.BE|
|00000890| 51 20 73 61 6d 65 0d 05 | 50 13 43 4d 50 20 62 79 |Q same..|P.CMP by|
|000008a0| 74 65 61 2c 62 79 74 65 | 62 0d 05 5a 14 53 55 42 |tea,byte|b..Z.SUB|
|000008b0| 45 51 20 61 64 64 2c 61 | 64 64 2c 23 32 0d 05 64 |EQ add,a|dd,#2..d|
|000008c0| 10 43 4d 50 20 61 64 64 | 2c 23 31 32 37 0d 05 6e |.CMP add|,#127..n|
|000008d0| 0b 42 4e 45 20 6e 6f 74 | 0d 05 78 19 53 54 52 42 |.BNE not|..x.STRB|
|000008e0| 20 62 79 74 65 61 2c 5b | 73 61 76 65 2c 61 64 64 | bytea,[|save,add|
|000008f0| 5d 0d 05 82 13 4d 4f 56 | 20 62 79 74 65 62 2c 62 |]....MOV| byteb,b|
|00000900| 79 74 65 61 0d 05 8c 1a | 4c 44 52 42 20 62 79 74 |ytea....|LDRB byt|
|00000910| 65 61 2c 5b 73 63 72 65 | 65 6e 5d 2c 23 31 0d 05 |ea,[scre|en],#1..|
|00000920| 96 08 2e 6e 6f 74 0d 05 | a0 14 41 44 44 20 61 64 |...not..|..ADD ad|
|00000930| 64 2c 61 64 64 2c 23 26 | 38 30 0d 05 aa 13 53 54 |d,add,#&|80....ST|
|00000940| 52 42 20 61 64 64 2c 5b | 73 61 76 65 5d 0d 05 b4 |RB add,[|save]...|
|00000950| 14 53 55 42 20 61 64 64 | 2c 61 64 64 2c 23 26 37 |.SUB add|,add,#&7|
|00000960| 46 0d 05 be 15 41 44 44 | 20 73 61 76 65 2c 73 61 |F....ADD| save,sa|
|00000970| 76 65 2c 61 64 64 0d 05 | c8 12 43 4d 50 20 73 63 |ve,add..|..CMP sc|
|00000980| 72 65 65 6e 2c 65 6e 64 | 0d 05 d2 0d 42 45 51 20 |reen,end|....BEQ |
|00000990| 6c 65 61 76 65 0d 05 dc | 13 43 4d 50 20 62 79 74 |leave...|.CMP byt|
|000009a0| 65 61 2c 62 79 74 65 62 | 0d 05 e6 0d 42 4e 45 20 |ea,byteb|....BNE |
|000009b0| 73 74 61 72 74 0d 05 f0 | 09 2e 73 61 6d 65 0d 05 |start...|..same..|
|000009c0| fa 0e 4d 4f 56 20 61 64 | 64 2c 23 31 0d 06 04 0a |..MOV ad|d,#1....|
|000009d0| 2e 6c 6f 6f 70 31 0d 06 | 0e 12 41 44 44 20 61 64 |.loop1..|..ADD ad|
|000009e0| 64 2c 61 64 64 2c 23 31 | 0d 06 18 10 43 4d 50 20 |d,add,#1|....CMP |
|000009f0| 61 64 64 2c 23 31 32 37 | 0d 06 22 0d 42 45 51 20 |add,#127|..".BEQ |
|00000a00| 73 6b 69 70 31 0d 06 2c | 12 43 4d 50 20 73 63 72 |skip1..,|.CMP scr|
|00000a10| 65 65 6e 2c 65 6e 64 0d | 06 36 0e 42 45 51 20 66 |een,end.|.6.BEQ f|
|00000a20| 69 6e 69 73 68 0d 06 40 | 1a 4c 44 52 42 20 62 79 |inish..@|.LDRB by|
|00000a30| 74 65 61 2c 5b 73 63 72 | 65 65 6e 5d 2c 23 31 0d |tea,[scr|een],#1.|
|00000a40| 06 4a 13 43 4d 50 20 62 | 79 74 65 61 2c 62 79 74 |.J.CMP b|ytea,byt|
|00000a50| 65 62 0d 06 54 0d 42 45 | 51 20 6c 6f 6f 70 31 0d |eb..T.BE|Q loop1.|
|00000a60| 06 5e 0a 2e 73 6b 69 70 | 31 0d 06 68 10 43 4d 50 |.^..skip|1..h.CMP|
|00000a70| 20 61 64 64 2c 23 31 32 | 37 0d 06 72 1a 41 44 44 | add,#12|7..r.ADD|
|00000a80| 45 51 20 73 63 72 65 65 | 6e 2c 73 63 72 65 65 6e |EQ scree|n,screen|
|00000a90| 2c 23 31 0d 06 7c 18 53 | 54 52 42 20 62 79 74 65 |,#1..|.S|TRB byte|
|00000aa0| 62 2c 5b 73 61 76 65 2c | 23 31 5d 0d 06 86 13 53 |b,[save,|#1]....S|
|00000ab0| 54 52 42 20 61 64 64 2c | 5b 73 61 76 65 5d 0d 06 |TRB add,|[save]..|
|00000ac0| 90 14 41 44 44 20 73 61 | 76 65 2c 73 61 76 65 2c |..ADD sa|ve,save,|
|00000ad0| 23 32 0d 06 9a 0b 42 20 | 73 74 61 72 74 0d 06 a4 |#2....B |start...|
|00000ae0| 0b 2e 66 69 6e 69 73 68 | 0d 06 ae 13 53 54 52 42 |..finish|....STRB|
|00000af0| 20 61 64 64 2c 5b 73 61 | 76 65 5d 0d 06 b8 18 53 | add,[sa|ve]....S|
|00000b00| 54 52 42 20 62 79 74 65 | 62 2c 5b 73 61 76 65 2c |TRB byte|b,[save,|
|00000b10| 23 31 5d 0d 06 c2 14 41 | 44 44 20 73 61 76 65 2c |#1]....A|DD save,|
|00000b20| 73 61 76 65 2c 23 32 0d | 06 cc 0a 2e 6c 65 61 76 |save,#2.|....leav|
|00000b30| 65 0d 06 d6 16 53 55 42 | 20 73 61 76 65 2c 73 61 |e....SUB| save,sa|
|00000b40| 76 65 2c 69 6e 69 74 0d | 06 e0 14 53 55 42 20 73 |ve,init.|...SUB s|
|00000b50| 61 76 65 2c 73 61 76 65 | 2c 23 34 0d 06 ea 13 53 |ave,save|,#4....S|
|00000b60| 54 52 20 73 61 76 65 2c | 5b 69 6e 69 74 5d 0d 06 |TR save,|[init]..|
|00000b70| f4 1a 4c 44 4d 46 44 20 | 52 31 33 21 2c 7b 52 30 |..LDMFD |R13!,{R0|
|00000b80| 2d 52 31 32 2c 50 43 7d | 0d 06 fe 04 0d 07 08 0d |-R12,PC}|........|
|00000b90| 2e 75 6e 73 71 75 61 73 | 68 0d 07 12 1b 53 54 4d |.unsquas|h....STM|
|00000ba0| 46 44 20 52 31 33 21 2c | 7b 52 30 2d 52 31 32 2c |FD R13!,|{R0-R12,|
|00000bb0| 52 31 34 7d 0d 07 1c 0f | 4d 4f 56 20 52 30 2c 73 |R14}....|MOV R0,s|
|00000bc0| 61 76 65 0d 07 26 0f 4d | 4f 56 20 52 31 2c 23 26 |ave..&.M|OV R1,#&|
|00000bd0| 36 34 0d 07 30 13 53 57 | 49 20 22 4f 53 5f 57 72 |64..0.SW|I "OS_Wr|
|00000be0| 69 74 65 4e 22 0d 07 3a | 16 41 44 44 20 73 61 76 |iteN"..:|.ADD sav|
|00000bf0| 65 2c 73 61 76 65 2c 23 | 26 36 38 0d 07 44 0a 2e |e,save,#|&68..D..|
|00000c00| 62 65 67 69 6e 0d 07 4e | 18 4c 44 52 42 20 62 79 |begin..N|.LDRB by|
|00000c10| 74 65 61 2c 5b 73 61 76 | 65 5d 2c 23 31 0d 07 58 |tea,[sav|e],#1..X|
|00000c20| 12 43 4d 50 20 62 79 74 | 65 61 2c 23 26 38 30 0d |.CMP byt|ea,#&80.|
|00000c30| 07 62 0c 42 4d 49 20 6d | 69 73 73 0d 07 6c 18 53 |.b.BMI m|iss..l.S|
|00000c40| 55 42 20 62 79 74 65 61 | 2c 62 79 74 65 61 2c 23 |UB bytea|,bytea,#|
|00000c50| 26 38 30 0d 07 76 0a 2e | 6c 6f 6f 70 34 0d 07 80 |&80..v..|loop4...|
|00000c60| 18 4c 44 52 42 20 62 79 | 74 65 62 2c 5b 73 61 76 |.LDRB by|teb,[sav|
|00000c70| 65 5d 2c 23 31 0d 07 8a | 1a 53 54 52 42 20 62 79 |e],#1...|.STRB by|
|00000c80| 74 65 62 2c 5b 73 63 72 | 65 65 6e 5d 2c 23 31 0d |teb,[scr|een],#1.|
|00000c90| 07 94 16 53 55 42 20 62 | 79 74 65 61 2c 62 79 74 |...SUB b|ytea,byt|
|00000ca0| 65 61 2c 23 31 0d 07 9e | 12 43 4d 50 20 73 63 72 |ea,#1...|.CMP scr|
|00000cb0| 65 65 6e 2c 65 6e 64 0d | 07 a8 0c 42 45 51 20 71 |een,end.|...BEQ q|
|00000cc0| 75 69 74 0d 07 b2 10 43 | 4d 50 20 62 79 74 65 61 |uit....C|MP bytea|
|00000cd0| 2c 23 30 0d 07 bc 0d 42 | 4e 45 20 6c 6f 6f 70 34 |,#0....B|NE loop4|
|00000ce0| 0d 07 c6 0b 42 20 62 65 | 67 69 6e 0d 07 d0 09 2e |....B be|gin.....|
|00000cf0| 6d 69 73 73 0d 07 da 18 | 4c 44 52 42 20 62 79 74 |miss....|LDRB byt|
|00000d00| 65 62 2c 5b 73 61 76 65 | 5d 2c 23 31 0d 07 e4 0a |eb,[save|],#1....|
|00000d10| 2e 6c 6f 6f 70 35 0d 07 | ee 1a 53 54 52 42 20 62 |.loop5..|..STRB b|
|00000d20| 79 74 65 62 2c 5b 73 63 | 72 65 65 6e 5d 2c 23 31 |yteb,[sc|reen],#1|
|00000d30| 0d 07 f8 16 53 55 42 20 | 62 79 74 65 61 2c 62 79 |....SUB |bytea,by|
|00000d40| 74 65 61 2c 23 31 0d 08 | 02 12 43 4d 50 20 73 63 |tea,#1..|..CMP sc|
|00000d50| 72 65 65 6e 2c 65 6e 64 | 0d 08 0c 0c 42 45 51 20 |reen,end|....BEQ |
|00000d60| 71 75 69 74 0d 08 16 10 | 43 4d 50 20 62 79 74 65 |quit....|CMP byte|
|00000d70| 61 2c 23 30 0d 08 20 0d | 42 4e 45 20 6c 6f 6f 70 |a,#0.. .|BNE loop|
|00000d80| 35 0d 08 2a 0b 42 20 62 | 65 67 69 6e 0d 08 34 09 |5..*.B b|egin..4.|
|00000d90| 2e 71 75 69 74 0d 08 3e | 1a 4c 44 4d 46 44 20 52 |.quit..>|.LDMFD R|
|00000da0| 31 33 21 2c 7b 52 30 2d | 52 31 32 2c 50 43 7d 0d |13!,{R0-|R12,PC}.|
|00000db0| 08 48 05 5d 0d 08 52 09 | ed 20 6f 70 74 0d 08 5c |.H.]..R.|. opt..\|
|00000dc0| 05 e1 0d ff             |                         |....    |        |
+--------+-------------------------+-------------------------+--------+--------+